DOWNLOAD "TEST.BAS"
SIZE 56 mm,40 mm
GAP 0,0
DENSITY 8
SPEED 3
DIRECTION 0
REFERENCE 0,0
SET PEEL OFF
CLS
CODE1=ASC("A")
TEXT 100,100,"3",0,1,1,STR$(CODE1)
PRINT 1
EOP
RUN "TEST.BAS"
